home *** CD-ROM | disk | FTP | other *** search
/ Deutsche Edition 1 / Deutsche Edition 1.iso / amok / 031-040 / amok31 / arpfilereq / arpfilereq.def next >
Text File  |  1993-11-04  |  1KB  |  27 lines
  1. (*---------------------------------------------------------------------------
  2.     :Program.     ARPFileReq.def
  3.     :Contents.      Simple Benutzung des ARP Filerequesters
  4.     :Author.      Bernd Preusing
  5.     :Address.      Gerhardstr. 16  D-2200 Elmshorn
  6.     :Phone.      04121/22486
  7.     :Copyright.      Public Domain
  8.     :Language.      Modula-2
  9.     :Translator.  M2Amiga V3.2e
  10.     :History.      V1.0 09-Oct-89 Bernd Preusing
  11. ---------------------------------------------------------------------------*)
  12. DEFINITION MODULE ARPFileReq;
  13.  
  14. FROM SYSTEM    IMPORT    ADDRESS;
  15.  
  16. PROCEDURE FileReq(VAR FName:ARRAY OF CHAR; Window:ADDRESS; Title:ARRAY OF CHAR;
  17.          flag:BOOLEAN):    BOOLEAN;
  18. (* :Input.    FName: Vorgabe des kompletten Namens mit Pfad
  19.    :Input.    Window: Das Fenster, in dem der Requester erscheinen soll
  20.    :Input.    Title: Meldung für Fensterkopf, z.B. 'Laden'
  21.    :Input.    flag: TRUE oder FALSE ergeben verschiedene Farben des Requesters
  22.    :Result.    TRUE: FName ist gültig und wurde angewählt.
  23.    :Result.    FALSE: Es wurde CANCEL oder Window-Close angewählt
  24.    :Semantic.    Es wird ein ARP-FileRequester geöffnet.
  25. *)
  26. END ARPFileReq.def
  27.